home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue33 / clinic / UpdateSystemFileMainFormUnit.dfm / UpdateSystemFileMainFormUnit.txt
Encoding:
Text File  |  1998-03-27  |  1.7 KB  |  82 lines

  1. object Form1: TForm1
  2.   Left = 194
  3.   Top = 132
  4.   BorderStyle = bsSingle
  5.   Caption = 'Update a file in use'
  6.   ClientHeight = 226
  7.   ClientWidth = 224
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Position = poDefaultPosOnly
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object lblSrc: TLabel
  17.     Left = 16
  18.     Top = 101
  19.     Width = 68
  20.     Height = 13
  21.     Caption = 'No file chosen'
  22.   end
  23.   object lblDst: TLabel
  24.     Left = 16
  25.     Top = 157
  26.     Width = 68
  27.     Height = 13
  28.     Caption = 'No file chosen'
  29.   end
  30.   object TLabel
  31.     Left = 32
  32.     Top = 16
  33.     Width = 169
  34.     Height = 41
  35.     Alignment = taCenter
  36.     AutoSize = False
  37.     Caption = 
  38.       'This causes a file in use (e.g. a system file) to be updated wit' +
  39.       'h a new version upon a reboot'
  40.     WordWrap = True
  41.   end
  42.   object btnChooseSrc: TButton
  43.     Left = 16
  44.     Top = 72
  45.     Width = 193
  46.     Height = 25
  47.     Caption = 'Choose Source File'
  48.     TabOrder = 0
  49.     OnClick = btnChooseSrcClick
  50.   end
  51.   object btnChooseDst: TButton
  52.     Left = 16
  53.     Top = 128
  54.     Width = 193
  55.     Height = 25
  56.     Caption = 'Choose Destination File'
  57.     Enabled = False
  58.     TabOrder = 1
  59.     OnClick = btnChooseDstClick
  60.   end
  61.   object btnSetup: TButton
  62.     Left = 16
  63.     Top = 184
  64.     Width = 193
  65.     Height = 25
  66.     Caption = 'Set up the file copy operation'
  67.     Enabled = False
  68.     TabOrder = 2
  69.     OnClick = btnSetupClick
  70.   end
  71.   object dlgSrc: TOpenDialog
  72.     Filter = 'Program files (*.exe;*.dll)|*.exe;*.dll|All files (*.*)|*.*'
  73.     Left = 8
  74.     Top = 16
  75.   end
  76.   object dlgDst: TSaveDialog
  77.     Filter = 'Program files (*.exe;*.dll)|*.exe;*.dll|All files (*.*)|*.*'
  78.     Left = 184
  79.     Top = 16
  80.   end
  81. end
  82.